funcion BDCONTAR